home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
pinwheel a
< prev
next >
Wrap
Text File
|
1999-06-15
|
793b
|
26 lines
Category: Filter Factory Gallery L
Title: Pinwheel A...
Author: Gregg Schorno
Copyright: Copyright © Gregg Schorno
ctl[0]: Spokes 1
ctl[1]: Spokes 2
ctl[2]: Operation
ctl[3]: Twist 1
ctl[4]: Twist 2
ctl[5]: Red
ctl[6]:Green
ctl[7]: Blue
val[0]: 25
val[1]: 120
val[2]: 77
val[3]: 63
val[4]: 189
val[5]: 235
val[6]: 248
val[7]: 81
R:put((d+m*val(3,-8,8))*val(0,1,24)%D,0),put((sin(get(0))+512)/4,0),put((d+m*val(4,-8,8))*val(1,1,24)%D,1),put((sin(get(1))+512)/4,1),scl(ctl(5),64,192,ctl(2)&128?min(get(0),get(1)):get(0)-get(1),ctl(2)&16?max(get(0),get(1)):get(1)-get(0))
G:scl(ctl(6),64,192,ctl(2)&64?min(get(0),get(1)):get(0)-get(1),ctl(2)&8?max(get(0),get(1)):get(1)-get(0))
B:scl(ctl(7),64,192,ctl(2)&32?min(get(0),get(1)):get(0)-get(1),ctl(2)&4?max(get(0),get(1)):get(1)-get(0))
A:255